home *** CD-ROM | disk | FTP | other *** search
/ Crosscountry USA Photo Safari / Crosscountry USA Photo Safari.iso / Data / cc_base / pak00_16bit_f.pk3 / credits.gl.p < prev    next >
Text File  |  2002-11-29  |  2KB  |  97 lines

  1. {
  2.   ActiveWhileHidden = TRUE; 
  3.   Hidden = TRUE;
  4.      
  5.   ChildID = {
  6.    
  7.     GuiAnimation("plate") {
  8.       AnimationID = "anim/guage_gui/guage_window.pcx";
  9.       X = 0;
  10.       Y = 0;
  11.       Width = 500;
  12.       Height = 360;
  13.     },          
  14.  
  15.     GuiAnimation("guages") {
  16.       AnimationID = "anim/guage_gui/window/guagy.anm";
  17.       X = 0;
  18.       Y = 0;
  19.       Width = 340;
  20.       Height = 360;
  21.     },
  22.  
  23.     GuiCreditsTileMap ("scroller") {
  24.       X = 109;
  25.       Y = 40;
  26.       Height = 225;
  27.       TileMapID = TileMap {
  28.         TileCountX = 1;
  29.         TileCountY = 2;
  30.         TileSet = {
  31.           "image/credits.pcx"
  32.         };
  33.         TileArray = {
  34.          0,
  35.          0
  36.         };
  37.       }
  38.       ScriptID = Script {
  39.         @loaded {
  40.           ResPropSetInt(SELF, "Width", ResPropGetInt(TileMapGetTileResID(ResPropGetResID(SELF, "TileMapID"), 0), "Width"));
  41.         }
  42.         @show {
  43.           ResPropSetInt(SELF, "ScrollY", 0);
  44.           ResPropSetInt(SELF, "state", 0);
  45.           ResPropSetInt(SELF, "timeout", CVarGetInt("framerate") * 5);
  46.         }
  47.         @animate {
  48.           int scrolly;
  49.           int height;
  50.           int state;
  51.           int timeout;
  52.           resid credits_image_id;
  53.         
  54.           ResPropAlias(SELF, "state", "state");
  55.           ResPropAlias(SELF, "timeout", "timeout");
  56.  
  57.           if (state==0) {
  58.             timeout -= 1;
  59.             if (timeout<0) {
  60.               state = 1;
  61.             } else {
  62.               stop;
  63.             }
  64.           }
  65.  
  66.           ResPropAlias(SELF, "ScrollY", "scrolly");
  67.           credits_image_id = TileMapGetTileResID(ResPropGetResID(SELF, "TileMapID"), 0);
  68.  
  69.           height = ResPropGetInt(credits_image_id, "Height");
  70.           scrolly -= 1;
  71.           if (scrolly<-height) {
  72.             scrolly += height;
  73.           }
  74.  
  75.         }
  76.       };
  77.     },
  78.   
  79.     GuiButton("main_menu") {
  80.       X = 160;
  81.       Y = 280;
  82.       TextID = Mangle(1/*"Main Menu"*/);
  83.       StyleID = "gui/bs/square.gbs";
  84.       FontID = "font/square_black_on_gray_9.tf";
  85.       Width = 160;
  86.       AutoSize = HEIGHT;
  87.       ScriptID = Script {
  88.         @activate {
  89.           resid mc;
  90.              mc = ResByName("splash_screen.gl/menu_controller");
  91.           ResPropSetResID(mc,"panel_to_display", ResByName("main_menu.gl"));
  92.         }
  93.       };
  94.     }
  95.   };
  96. }
  97.